home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 43 / Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso / -serious- / graphics / fxforge / colorfx / cyborgcolours < prev    next >
Text File  |  1999-06-15  |  1KB  |  50 lines
  1. Filter Factory Plugin Information:
  2.  
  3. FILENAME: T_CYBORG.8BF
  4.  
  5. CATEGORY: 
  6. Toadies
  7.  
  8. TITLE:    
  9. Cyborg
  10.  
  11. COPYRIGHT:
  12. Copyright © 1996 Ilyich the Toad. Freeware, contact ilyich@ioc.ac.ru
  13. for more.
  14.  
  15. AUTHOR:   
  16. Ilyich the Toad
  17.  
  18. Map 0: [Map 0:]
  19. Map 1: [Map 1:]
  20. Map 2: [Map 2:]
  21. Map 3: [Map 3:]
  22.  
  23. Control 0: [Reflection #1]
  24. Control 1: [Reflection #2]
  25. Control 2: [Shine #1]
  26. Control 3: [Shine #2]
  27. Control 4: [Control 4:]
  28. Control 5: [Mesh size]
  29. Control 6: [Mapping factor]
  30. Control 7: [Colour]
  31.  
  32. R=
  33. put((i - sin(i*val(0,5,20))/val(2,20,3) - sin(i*val(1,10,30))/val(3,17,3)), 1),
  34. get(1)>255 ? 512-get(1):get(1),
  35. put((255-max(max(r,g),b)),0),
  36. (x+scl(i,0,255,0,ctl(6)))%val(5,0,X)<=1 || (y+scl(i,0,255,0,ctl(6)))%val(5,0,Y)<=1 ? 0:
  37. ctl(7)*(get(0)+c)*get(1)/ 65025 + (255-ctl(7))*get(1)/255
  38.  
  39. G=
  40. (x+scl(i,0,255,0,ctl(6)))%val(5,0,X)<=1 || (y+scl(i,0,255,0,ctl(6)))%val(5,0,Y)<=1 ? 0:
  41. ctl(7)*(get(0)+c)*get(1)/ 65025 + (255-ctl(7))*get(1)/255
  42.  
  43. B=
  44. (x+scl(i,0,255,0,ctl(6)))%val(5,0,X)<=1 || (y+scl(i,0,255,0,ctl(6)))%val(5,0,Y)<=1 ? 0:
  45. ctl(7)*(get(0)+c)*get(1)/ 65025 + (255-ctl(7))*get(1)/255
  46.  
  47. A=
  48. c
  49.  
  50.